(calc-mode): Add font-lock-defontify to change-major-mode-hook.

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 09614aa1faf5e6e73f742cbe97960ddcf1d4c391..f119266ddf7e7d11073d35ac51444c1cd80583d1 100644 (file)
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1049,6 +1049,7 @@ Notations:  3.14e6     3.14 * 10^6
   (mapcar (function (lambda (v) (make-local-variable v))) calc-local-var-list)
   (make-local-variable 'overlay-arrow-position)
   (make-local-variable 'overlay-arrow-string)
+  (add-hook 'change-major-mode-hook 'font-lock-defontify nil t)
   (setq truncate-lines t)
   (setq buffer-read-only t)
   (setq major-mode 'calc-mode)